home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / A-B / 7 Balloons!.cpt / Balloons! / background_3999.xml < prev    next >
Extensible Markup Language  |  1991-08-28  |  10KB  |  202 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>3999</id>
  5.     <filler1>0</filler1>
  6.     <bitmap>BMAP_4791.pbm</bitmap>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_3303.css" />
  11.     <part>
  12.         <id>1</id>
  13.         <type>button</type>
  14.         <visible> <true /> </visible>
  15.         <reserved5> 0 </reserved5>
  16.         <reserved4> 0 </reserved4>
  17.         <reserved3> 0 </reserved3>
  18.         <reserved2> 0 </reserved2>
  19.         <reserved1> 0 </reserved1>
  20.         <enabled> <true /> </enabled>
  21.         <rect>
  22.             <left>410</left>
  23.             <top>309</top>
  24.             <right>450</right>
  25.             <bottom>336</bottom>
  26.         </rect>
  27.         <style>transparent</style>
  28.         <showName> <false /> </showName>
  29.         <highlight> <false /> </highlight>
  30.         <autoHighlight> <true /> </autoHighlight>
  31.         <sharedHighlight> <true /> </sharedHighlight>
  32.         <family>0</family>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>0</icon>
  35.         <textAlign>center</textAlign>
  36.         <font>Chicago</font>
  37.         <textSize>12</textSize>
  38.         <textStyle>plain</textStyle>
  39.         <name>Prev</name>
  40.         <script>on mouseUplock screengo prevunlock screen with visual wipe rightend mouseUpon mouseEnterShowABalloon "Click here to move backward through this stack " ¬¨& "one card at a time."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
  41.     </part>
  42.     <part>
  43.         <id>2</id>
  44.         <type>button</type>
  45.         <visible> <true /> </visible>
  46.         <reserved5> 0 </reserved5>
  47.         <reserved4> 0 </reserved4>
  48.         <reserved3> 0 </reserved3>
  49.         <reserved2> 0 </reserved2>
  50.         <reserved1> 0 </reserved1>
  51.         <enabled> <true /> </enabled>
  52.         <rect>
  53.             <left>450</left>
  54.             <top>309</top>
  55.             <right>488</right>
  56.             <bottom>336</bottom>
  57.         </rect>
  58.         <style>transparent</style>
  59.         <showName> <false /> </showName>
  60.         <highlight> <false /> </highlight>
  61.         <autoHighlight> <true /> </autoHighlight>
  62.         <sharedHighlight> <true /> </sharedHighlight>
  63.         <family>0</family>
  64.         <titleWidth>0</titleWidth>
  65.         <icon>0</icon>
  66.         <textAlign>center</textAlign>
  67.         <font>Chicago</font>
  68.         <textSize>12</textSize>
  69.         <textStyle>plain</textStyle>
  70.         <name>Next</name>
  71.         <script>on mouseUplock screengo nextunlock screen with visual wipe leftend mouseUpon mouseEnterShowABalloon "Click here to move forward through this stack " ¬¨& "one card at a time."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
  72.     </part>
  73.     <part>
  74.         <id>3</id>
  75.         <type>field</type>
  76.         <visible> <true /> </visible>
  77.         <dontWrap> <false /> </dontWrap>
  78.         <dontSearch> <false /> </dontSearch>
  79.         <sharedText> <false /> </sharedText>
  80.         <fixedLineHeight> <true /> </fixedLineHeight>
  81.         <autoTab> <false /> </autoTab>
  82.         <lockText> <true /> </lockText>
  83.         <rect>
  84.             <left>12</left>
  85.             <top>63</top>
  86.             <right>500</right>
  87.             <bottom>162</bottom>
  88.         </rect>
  89.         <style>scrolling</style>
  90.         <autoSelect> <false /> </autoSelect>
  91.         <showLines> <false /> </showLines>
  92.         <wideMargins> <true /> </wideMargins>
  93.         <multipleLines> <false /> </multipleLines>
  94.         <reservedFamily> 0 </reservedFamily>
  95.         <titleWidth>0</titleWidth>
  96.         <icon>0</icon>
  97.         <textAlign>left</textAlign>
  98.         <font>Geneva</font>
  99.         <textSize>10</textSize>
  100.         <textStyle>plain</textStyle>
  101.         <textHeight>13</textHeight>
  102.         <name>Info</name>
  103.         <script>on mouseUpdoDisplayend mouseUpon mouseEnterPut "This field contains information about the topic listed on "¬¨& "this card.  See the script of this field "¬¨& "for an example of how to use the variation code and "¬¨& "the alternativeRect (for controlling balloon removal)."¬¨into theMessageput calcTip() into locationput the Rect of the target into alternateRectsubtract 18 from item 3 of alternateRect -- shorten rect to not include scroll barput Balloons("Show",theMessage,location,2,alternateRect) ¬¨into helpResultrepeat until "-853" is not in helpResultput Balloons("Show",theMessage,location, 5, alternateRect) ¬¨into helpResultend repeatend mouseEnterfunction calcTipput (the right of me - the left of me)/2 into item 1 of tipput the bottom of me - 10 into item 2 of tipreturn tipend calcTip</script>
  104.     </part>
  105.     <part>
  106.         <id>4</id>
  107.         <type>field</type>
  108.         <visible> <true /> </visible>
  109.         <dontWrap> <false /> </dontWrap>
  110.         <dontSearch> <false /> </dontSearch>
  111.         <sharedText> <false /> </sharedText>
  112.         <fixedLineHeight> <false /> </fixedLineHeight>
  113.         <autoTab> <false /> </autoTab>
  114.         <lockText> <true /> </lockText>
  115.         <rect>
  116.             <left>26</left>
  117.             <top>210</top>
  118.             <right>488</right>
  119.             <bottom>299</bottom>
  120.         </rect>
  121.         <style>rectangle</style>
  122.         <autoSelect> <false /> </autoSelect>
  123.         <showLines> <false /> </showLines>
  124.         <wideMargins> <false /> </wideMargins>
  125.         <multipleLines> <false /> </multipleLines>
  126.         <reservedFamily> 0 </reservedFamily>
  127.         <titleWidth>0</titleWidth>
  128.         <icon>0</icon>
  129.         <textAlign>left</textAlign>
  130.         <font>Geneva</font>
  131.         <textSize>12</textSize>
  132.         <textStyle>plain</textStyle>
  133.         <textHeight>16</textHeight>
  134.         <name>helpMessage</name>
  135.         <script>on mouseEnterPut "This field, which is named 'helpMessage' is "¬¨& "being used to display variatons on the syntax of Balloons() "¬¨& "and to see return values from Balloons().  See the script "¬¨& "for an example of using the variation code and "¬¨& "the alternativeRect (for controlling balloon removal)."¬¨into theMessageput calcTip() into locationput the Rect of the target into alternateRectput Balloons("Show",theMessage,location,5,alternateRect) ¬¨into helpResultrepeat until "-853" is not in helpResultput Balloons("Show",theMessage,location, 5, alternateRect) ¬¨into helpResultend repeatend mouseEnterfunction calcTipput (the right of me - the left of me)/2 into item 1 of tipput the top of me + 10 into item 2 of tipreturn tipend calcTip-- because we passed an alternativeRect to Balloons()-- we don't need to remove the balloons.</script>
  136.     </part>
  137.     <part>
  138.         <id>5</id>
  139.         <type>button</type>
  140.         <visible> <true /> </visible>
  141.         <reserved5> 0 </reserved5>
  142.         <reserved4> 0 </reserved4>
  143.         <reserved3> 0 </reserved3>
  144.         <reserved2> 0 </reserved2>
  145.         <reserved1> 0 </reserved1>
  146.         <enabled> <true /> </enabled>
  147.         <rect>
  148.             <left>28</left>
  149.             <top>309</top>
  150.             <right>68</right>
  151.             <bottom>336</bottom>
  152.         </rect>
  153.         <style>transparent</style>
  154.         <showName> <false /> </showName>
  155.         <highlight> <false /> </highlight>
  156.         <autoHighlight> <true /> </autoHighlight>
  157.         <sharedHighlight> <false /> </sharedHighlight>
  158.         <family>0</family>
  159.         <titleWidth>0</titleWidth>
  160.         <icon>0</icon>
  161.         <textAlign>center</textAlign>
  162.         <font>Chicago</font>
  163.         <textSize>12</textSize>
  164.         <textStyle>plain</textStyle>
  165.         <name>Back</name>
  166.         <script>on mouseUplock screengo cd "title"unlock screen with visual wipe rightend mouseUpon mouseEnterShowABalloon "Click here to return to the title card and the " ¬¨& "Table of Contents."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
  167.     </part>
  168.     <part>
  169.         <id>6</id>
  170.         <type>button</type>
  171.         <visible> <true /> </visible>
  172.         <reserved5> 0 </reserved5>
  173.         <reserved4> 0 </reserved4>
  174.         <reserved3> 0 </reserved3>
  175.         <reserved2> 0 </reserved2>
  176.         <reserved1> 0 </reserved1>
  177.         <enabled> <true /> </enabled>
  178.         <rect>
  179.             <left>470</left>
  180.             <top>18</top>
  181.             <right>501</right>
  182.             <bottom>45</bottom>
  183.         </rect>
  184.         <style>transparent</style>
  185.         <showName> <false /> </showName>
  186.         <highlight> <false /> </highlight>
  187.         <autoHighlight> <false /> </autoHighlight>
  188.         <sharedHighlight> <true /> </sharedHighlight>
  189.         <family>0</family>
  190.         <titleWidth>0</titleWidth>
  191.         <icon>0</icon>
  192.         <textAlign>center</textAlign>
  193.         <font>Chicago</font>
  194.         <textSize>12</textSize>
  195.         <textStyle>plain</textStyle>
  196.         <name>On/Off</name>
  197.         <script>on mouseDownglobal isSixif the short name of this cd = "Error Messages/Return Values"then exit mouseDownif isSix then errorMsgif Balloons("isOn") thenget Balloons("Off")set the hilite of me to falseelseget Balloons("On")set the hilite of me to truemouseEnterend ifend mouseDownon mouseEnterShowAString 1513,,2end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave-- ShowAString handler is located in the script of this background</script>
  198.     </part>
  199.     <name>Balloons</name>
  200.     <script>on openCardglobal isSixif the short name of this cd = "Optional Parameters" or ¬¨the short name of this cd = "Create Strings"then hide fld "helpMessage"else show fld "helpMessage"if not isSixthen set the hilite of bg btn "on/off" to balloons("isOn")end openCardon closeCardset the scroll of fld "info" to 0put empty into fld "helpMessage"end closeCard-- The following handlers are duplicated here for the-- convenience of the user.  They are also in the-- Stack script where they can be called from anywhere.on ShowASTRLIst STRResourceID, index, theTip, versionif theTip is empty then put calcTip() into tipput STRResourceID && "," && index into resourceRecordput Balloons("ShowSTRList", resourceRecord, tip, version) ¬¨into helpResultput helpResult into fld "helpMessage"repeat until "-853" is not in helpResultput Balloons("ShowSTRList", resourceRecord, tip, version) ¬¨into helpResultput helpResult into fld "helpMessage"end repeatend ShowASTRListon ShowAString STRResourceID, theTip, versionif theTip is empty then put calcTip() into tipput Balloons("ShowSTR", STRResourceID, tip, version) ¬¨into helpResultput helpResult into fld "helpMessage"repeat until "-853" is not in helpResultput Balloons("ShowSTR", STRResourceID, tip, version) ¬¨into helpResultput helpResult into fld "helpMessage"end repeatend ShowAStringon doDisplayend doDisplayon arrowKey whichif which = "right" then send mouseUp to bg btn "next"else if which = "left" then send mouseUp to bg btn "prev"else pass arrowKeyend arrowKey</script>
  201. </background>
  202.